;;;Force PSTYLEMODE=1 (Drawing uses color tables for plotting).
(DEFUN c:psty2ctb ()
  (IF (EQ (GETVAR "pstylemode") 1)
    nil
    (COMMAND "convertpstyles")
  ) ;_ end of if
) ;_ end of defun
